Apple Reference & Presen…rary 6 (Reseller Edition)/Apple Ref. & Pres. Lib.v6.0.toast/pc/3-Presentations/Apple Demos/Training/Apple Scanner Training/Changed/background_5899.txt

Text File | 1990-04-02 | 5KB | 221 lines

-- background: 5899 from stack: in
-- bmap block id: 6174
-- flags: 0000
-- background id: 0
-- name: Setting Up Scanner


-- part 19 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=7 top=317 right=338 bottom=110
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Setup
----- HyperTalk script -----
on mouseUp
  visual effect zoom open
  go to stack "Set-Up"
  set highlight of background button "Installation" to false
  set highlight of background button "Using" to false
  set highlight of background button "Troubleshooting" to false
  set highlight of background button "Setup" to true
end mouseUp






-- part 20 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=119 top=317 right=338 bottom=222
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Installation
----- HyperTalk script -----
on mouseUp
  visual effect zoom open
  go to stack "Installation"
  set highlight of background button "Setup" to false
  set highlight of background button "Using" to false
  set highlight of background button "Troubleshooting" to false
  set highlight of background button "Installation" to true
end mouseUp



-- part 21 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=220 top=308 right=342 bottom=263
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  visual effect zoom open
  go to stack "Apple Scanner"
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: C004
-- rect: left=263 top=317 right=338 bottom=366
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Using
----- HyperTalk script -----
on mouseUp
  visual effect zoom open
  go to stack "Using"
  set highlight of background button "Setup" to false
  set highlight of background button "Installation" to false
  set highlight of background button "Troubleshooting" to false
  set highlight of background button "Using" to true
end mouseUp



-- part 23 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=376 top=317 right=338 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Troubleshooting
----- HyperTalk script -----
on mouseUp
  visual effect zoom open
  go to stack "Troubleshooting"
  set highlight of background button "Setup" to false
  set highlight of background button "Installation" to false
  set highlight of background button "Using" to false
  set highlight of background button "Troubleshooting" to true
end mouseUp



-- part 27 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=454 top=1 right=40 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 1004 / 1004
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----

on mouseUp
  play harpsichord a4
  global search
  answer "Type of Glossary search?" with "Browse" or "Automatic" or "Cancel"
  if it is "Browse" then
    visual wipe up slowly
    go to card "Glossary" of stack "Glossary"
  end if

  if it is "Automatic" then
    ask "Search for..."
    put it into search
    if search is empty then
      exit mouseUp
    else
      visual wipe up slowly
      put "find search" into message box
      hide message
      go to card "Glossary" of stack "Glossary"
      find word search in field "Text"
      if the result is "not found" then
        answer "Word not found." with "OK"
        exit  mouseUp
      else
        show card field id 13
        wait 4 seconds
        hide card field id 13
      end if
    end if
  end if
end mouseUp





-- part 28 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=414 top=1 right=40 bottom=455
-- title width / last selected line: 0
-- icon id / first selected line: 1008 / 1008
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  answer "Print this card?" with "Yes" or "Cancel"
  if it is "Yes" then
    doMenu "Print Card"
  end if
  if it is "Cancel" then
    put "Cancel" into it
  end if
end  mouseUp




-- part 29 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=404 top=280 right=303 bottom=428
-- title width / last selected line: 0
-- icon id / first selected line: 2162 / 2162
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Left
----- HyperTalk script -----
on mouseUp
  visual zoom in to card
  pop card
end mouseUp